home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / Training / HyperCard 2.0 Training / Intro to HyperCard 2.0 / card_7791.txt < prev    next >
Text File  |  1990-08-24  |  4KB  |  184 lines
  1. -- card: 7791 from stack: in.0
  2. -- bmap block id: 31244
  3. -- flags: 0000
  4. -- background id: 15491
  5. -- name: graphics
  6. ----- HyperTalk script -----
  7. on closeCard
  8.   reset
  9. end closeCard
  10.  
  11. on reset
  12.   lock screen
  13.   choose select tool
  14.   drag from 79,138 to 412,285
  15.   doMenu "clear picture"
  16.   choose browse tool
  17.   hide tool window
  18.   hide pattern window
  19.   unlock screen with dissolve
  20. end reset
  21.  
  22.  
  23.  
  24. -- part 1 (button)
  25. -- low flags: 00
  26. -- high flags: 2000
  27. -- rect: left=204 top=287 right=330 bottom=254
  28. -- title width / last selected line: 0
  29. -- icon id / first selected line: 0 / 0
  30. -- text alignment: 1
  31. -- font id: 0
  32. -- text size: 12
  33. -- style flags: 0
  34. -- line height: 16
  35. -- part name: drawIt
  36. ----- HyperTalk script -----
  37. -- Draw the hammer graphic
  38. on mouseUp
  39.   reset
  40.  
  41.   show tool window at "49,160"
  42.   show pattern window at "349,160"
  43.  
  44.   set cursor to none
  45.   wait 50
  46.   choose line tool
  47.   set the lineSize to 1
  48.   --top:
  49.   drag from 159,163 to 159,157
  50.   drag from 159,157 to 154,154
  51.   drag from 154,154 to 148,154
  52.   drag from 148,154 to 134,163
  53.   drag from 134,163 to 134,165
  54.   drag from 134,165 to 148,157
  55.   wait 20
  56.  
  57.   --edge of Top:
  58.   drag from 134,165 to 136,169
  59.   drag from 136,169 to 140,165
  60.   drag from 140,165 to 149,160
  61.   drag from 149,160 to 157,161
  62.   drag from 157,161 to 158,162
  63.   wait 20
  64.  
  65.   --connection to part that hits:
  66.   drag from 159,158 to 167,159
  67.   drag from 167,159 to 167,165
  68.   drag from 167,165 to 159,163
  69.  
  70.   --side of top:
  71.   drag from 136,169 to 139,171
  72.   drag from 139,171 to 148,165
  73.   drag from 148,165 to 149,169
  74.   drag from 149,169 to 154,169
  75.   drag from 154,169 to 159,166
  76.   drag from 159,166 to 167,167
  77.   drag from 167,167 to 167,165
  78.   wait 20
  79.  
  80.   --the part you hit the nail with:
  81.   drag from 167,167 to 167,169
  82.   drag from 167,169 to 172,169
  83.   drag from 172,169 to 172,157
  84.   drag from 172,157 to 167,157
  85.   drag from 167,157 to 167,165
  86.   wait 20
  87.  
  88.   --step down 1:
  89.   drag from 149,169 to 149,172
  90.   drag from 149,172 to 157,172
  91.   drag from 157,172 to 159,166
  92.   wait 20
  93.  
  94.   --step down 2:
  95.   drag from 149,172 to 150,178
  96.   drag from 150,178 to 156,178
  97.   drag from 156,178 to 157,172
  98.   wait 20
  99.  
  100.   --middle of handle:
  101.   drag from 150,178 to 150,201
  102.   drag from 150,201 to 145,265
  103.   drag from 145,265 to 149,266
  104.   drag from 149,266 to 154,266
  105.   drag from 154,266 to 157,265
  106.   drag from 157,265 to 156,201
  107.   drag from 156,201 to 156,178
  108.   wait 20
  109.  
  110.   --left edge of handle:
  111.   drag from 150,178 to 148,201
  112.   drag from 148,201 to 143,264
  113.   drag from 143,264 to 145,265
  114.   wait 20
  115.  
  116.   --right edge of handle:
  117.   drag from 156,178 to 158,218
  118.   drag from 158,218 to 160,262
  119.   drag from 160,262 to 157,265
  120.   wait 20
  121.  
  122.   --select the hammer to trace edges
  123.   choose select tool
  124.   drag from 125,148 to 193,272
  125.   wait 20
  126.  
  127.   doMenu "trace edges"
  128.   wait 20
  129.  
  130.   --fill in the hammer with patterns
  131.   choose bucket tool
  132.   wait 20
  133.   set pattern to 12
  134.   wait 20
  135.   click at 153,157
  136.   click at 154,164
  137.   click at 163,162
  138.   click at 154,164
  139.   click at 154,175
  140.   click at 170,163
  141.   wait 20
  142.  
  143.   set pattern to 35
  144.   wait 20
  145.   click at 152,248
  146.   wait 20
  147.  
  148.   set pattern to 13
  149.   wait 20
  150.   click at 157,199
  151.   wait 20
  152.  
  153.   --copy the hammer
  154.   choose select tool
  155.   wait 20
  156.   drag from 125,148 to 193,272
  157.   doMenu "copy picture"
  158.   doMenu "paste picture"
  159.   wait 20
  160.  
  161.   drag from 159,210 to 300,210
  162.   doMenu "flip horizontal"
  163.   wait 20
  164.  
  165.   choose text tool
  166.   wait 20
  167.   set textStyle to extend,bold
  168.   set textAlign to center
  169.   set textSize to 14
  170.   set textFont to Futura
  171.   click at 229,186
  172.   type "HyperCard‚Äî" & return & "An Information" & return & "Management" & return & "Tool"
  173.  
  174.   hide tool window
  175.   hide pattern window
  176.   choose browse tool
  177. end mouseUp
  178.  
  179.  
  180.  
  181. -- part contents for background part 6
  182. ----- text -----
  183. HyperCard comes with its own set of painting tools.You can use these tools at any time while you are making a stack. (You can also import graphics from any program that saves in the MacPaint format). Click the animation button to see a drawing produced with the tools.
  184.